Nuprl Lemma : rel_plus_minimal
11,40
postcript
pdf
T
:Type,
R
,
Q
:(
T
T
).
R
=>
Q
Trans(
T
;
x
,
y
.
x
Q
y
)
R
^+ =>
Q
latex
Definitions
x
:
A
.
B
(
x
)
,
x
:
A
B
(
x
)
,
,
Type
,
P
Q
,
Trans(
T
;
x
,
y
.
E
(
x
;
y
))
,
x
f
y
,
f
(
a
)
,
R1
=>
R2
,
R
^+
,
x
:
A
B
(
x
)
,
rel_exp(
T
;
R
;
n
)
,
,
x
:
A
.
B
(
x
)
,
,
{
x
:
A
|
B
(
x
)}
,
A
,
False
,
Void
,
A
B
,
a
<
b
,
Dec(
P
)
,
P
Q
,
left
+
right
,
#$n
,
s
~
t
,
s
=
t
,
t
T
,
,
SQType(
T
)
,
{
T
}
,
(
i
=
j
)
,
P
&
Q
,
A
c
B
,
n
-
m
,
n
+
m
,
-
n
,
P
Q
,
P
Q
Lemmas
rel
exp
iff
,
member
wf
,
decidable
int
equal
,
le
wf
,
rel
exp
wf
,
nat
plus
properties
origin
T:Type, R, Q:(T
T
). R => Q 
Trans(T;x,y.x Q y) R^+ => Q T:Type, R, Q:(TT). R => Q Trans(T;x,y.x Q y) R^+ => Q x:A. B(x)B(x) Q
B(x)
x:A. B(x)
A
B
Q
T
j)
B
Q Q